home *** CD-ROM | disk | FTP | other *** search
/ Scene Storm / Scene Storm - Volume 1.iso / coding / c / vbcc / machines / amiga68k / libsrc / math / math_ieee / fabs.s < prev    next >
Encoding:
Text File  |  1995-09-15  |  221 b   |  16 lines
  1.  xref _MathIeeeDoubBasBase
  2.  
  3. result
  4.  dc.l 0,0
  5.  
  6.  xdef _fabs
  7. _fabs:
  8.  movem.l 4(sp),d0-d1
  9.  move.l  a6,-(sp)
  10.  move.l  _MathIeeeDoubBasBase,a6
  11.  jsr     -54(a6)
  12.  movem.l  d0-d1,result
  13.  move.l   #result,d0
  14.  move.l  (sp)+,a6
  15.  rts
  16.